home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 21 / CU Amiga Magazine's Super CD-ROM 21 (1998)(EMAP Images)(GB)[!][issue 1998-04].iso / CUCD / Programming / Python-1.4 / Python1.4_Source / Modules / cryptmodule.c < prev    next >
C/C++ Source or Header  |  1996-12-15  |  664b  |  44 lines
  1. /* cryptmodule.c - by Steve Majewski
  2.  */
  3.  
  4. #include "allobjects.h"
  5.  
  6. #include <sys/types.h>
  7.  
  8. #ifdef AMITCP
  9. #include <proto/usergroup.h>
  10. #endif
  11.  
  12. #include "protos/cryptmodule_protos.h"
  13.  
  14. /* Module crypt */
  15.  
  16.  
  17. static object *crypt_crypt(self, args)
  18.     object *self, *args;
  19. {
  20.     char *word, *salt; 
  21.     extern char * crypt();
  22.  
  23.     struct passwd *p;
  24.     if (!getargs(args, "(ss)", &word, &salt)) {
  25.         return NULL;
  26.     }
  27.     return newstringobject( crypt( word, salt ) );
  28.  
  29. }
  30.  
  31. static struct methodlist crypt_methods[] = {
  32.     {"crypt",    crypt_crypt},
  33.     {NULL,        NULL}        /* sentinel */
  34. };
  35.  
  36. void
  37. initcrypt()
  38. {
  39. #ifdef AMITCP
  40.     if(!checkusergrouplib()) return;
  41. #endif
  42.     initmodule("crypt", crypt_methods);
  43. }
  44.